﻿Public Class Path

    Private pMajorID As String
    Private pDegreeID As String
    Private pPathID As Integer
    Private pPathTitle As String
    Private requirementList As DataSet

    Public Sub New()
        pMajorID = ""
        pDegreeID = ""
        pPathID = 0
        pPathTitle = ""
    End Sub

    Public Property MajorID As String
        Get
            Return pMajorID
        End Get
        Set(ByVal value As String)
            pMajorID = value
        End Set
    End Property

    Public Property DegreeID As String
        Get
            Return pDegreeID
        End Get
        Set(ByVal value As String)
            pDegreeID = value
        End Set
    End Property

    Public Property PathID As Integer
        Get
            Return pPathID
        End Get
        Set(ByVal value As Integer)
            pPathID = value
        End Set
    End Property

    Public Property PathTitle As String
        Get
            Return pPathTitle
        End Get
        Set(ByVal value As String)
            pPathTitle = value
        End Set
    End Property

    Public ReadOnly Property PathRequirements As DataSet
        Get
            Return requirementList
        End Get
    End Property

    Private Sub StorePathRequirements()
        'Call getPathRequirements WebService method
    End Sub

End Class
